a 


Bas 


FFFFFFFFFRFFFFE 000000000 RRRRRRRRRRRR RRRRRRRRRRRR TITTTTTTTTTTTTT LLet 
FFFFFRFFRRFFFFE 000000000 RRRRRRRRRRRR RRRRRRRRRRRR TITTTTTTTTTTTFT Lie 
FFFFFRFRRRFFFFFE 000000000 RRRRRRRRRRRR RRRRRRRRRRRR TITTTTITTTTTTTT §=LtL 
FFF 000 000 RRR RRR RRR RRR TTT LLL 
FFF 000 000 RRR RRR RRR RRR TTT LLL 

FFF 000 RRR RRR RRR RRR TTT LLL 

FFF 000 000 RRR RRR RRR RRR TTT LLL 

FFF 000 000 RRR RRR RRR RRR TTT LLL 

FFF 000 000 RRR RRR RRR RRR TTT LLL 
FFFFFFFFFFFF 000 000 RRRRRRRRRRRR RRRRRRRRRRRR TTT LLL 
FFFFFFFFFFFE 000 000 RRRRRRRRRRRR RRRRRRRRRRRR TTT LLL 
FFFFFFFFFFFF 000 000 RRRRRRRRRRRR RRRRRRRRRRRR TTT LLL 

FFF 000 000 RRR RRR RRR = RRR TTT LLL 

FFF 000 000 RRR RRR RRR = =RRR TTT LLL 

FFF 000 RRR RRR RRR = RRR TTT LLL 

FFF 000 000 RRR RRR RRR RRR TTT LLL 

FFF 000 000 RRR RRR RRR RRR TTT LLL 

FFF 0 000 RRR RRR RRR RRR TTT LLL 

FFF 000000000 RRR RRR RRR RRR TTT LLLLLLLLLLELLLL 
FFF 000000000 RRR RRR RRR RRR TTT LLLLLLLLLLELLLL 
FFF 000000000 RRR RRR RRR RRR TTT LLLLELLLLLLLLLL 


) 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 


LOL LL LL LL LL LL LL LO LO LP LO LL LL LL 


**F [LE®*1D**F ORNML 


Pal 
oO 


C 
C 
C 
Ce 
C* 
C* 
C* 
| Ce 
¢* 
| ce 
Ce 
FFFFFFFFFF 000000 RRRRRRRR NN NN MM MM LL | ¢* 
FFEFFFFFFFF 000000 RRRRRRRR NN NN MM MM LL | Ct 
FF 00 00 RR RR WN NN MMMM MMMM LL Ce 
FF 00 00 RR RR NN NN MMMM MMMM LL ¢* 
FF 00 00 RR RR NNNN NN MM MM MM LL | C* 
FF 00 00 RR RR NNNN Wh MM MM MM LL Ct 
FFFFFFFF 00 00 RRRRRRRR NN NN NN MM MM LL Ce 
FFFFFFFF 00 00 RRRRRRRR NN NN NN MM MM LL | Ce 
FF 00 00 RR RR NN NNNN MM MM LL Ct 
FF 00 00 RR RR NN NNNN MM MM LL Ce 
FF 00 00 RR RR NN NN MM MM LL ‘james | C* 
FF 00 00 RR RR NN NN MM MM LL neta Ce 
FF 000000 RR RR NN NN MM MM LLLLLLLLLL mache | Ce 
FF 000000 RR RR NN NN MM MM LLLLLLLLLL pete Ce 
| 
RRRRRRRR EEEEEEEE aaaaaa | 
RRRRRRRR EEEEEEEE aaaaaa 
RR RR aa aa 
RR RR QQ QQ 
RR RR QQ QQ | 
| 
j 
| 
| 


EE 
EE 
EE 
EE 
RRRRRRRR EEEEEEEE QQ QQ 
EEEEEEEE 
EE 
EE 
EE 
EE 
EE E 
EE E QQ0Q QQ 
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! FORNML.REQ = NAMELIST NML$ Definitions - Version 1-002 = Edit: SBL1002 


' 
eRe R REAR REEA EAE EAA Tee eeeee eee e ee 


't COPYRIGHT (c) 1978, 1980, 1982, 1984 B 
ie DIGITAL EQUIPMENT CORPORATION, MAYNARD. MASSACHUSETTS. 
't ALL RIGHTS RESERVED. 


Hl hel SOF TWARE 4 FURNISHED me A LICENSE AND MAY BE USED AND COPIE 
'* ONLY IN ACCORDANCE WITH THE TERMS OF SUCH Tint AND s TH 
:* INCLUSION OF THe NABOVE geiko NOTICE. THIS SOFT WARE OR ANY OTHE 
‘* COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO AN 
:* TReSFERRED NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREB 
® 


it THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE W 
ie AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGI 
it CORPORATION. 


i® DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
:* SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 


D 
E 
R 
Y 
Y 


HOUT NOT 


IT ICE 
TAL EQUIPMENT 


@eeneeeeenenneeeeeenenanne 


ORR REE RE EAE ARE AERA REAR AAAAER AERA AAA AAA AEA EEA Ke 
' 


! AUTHOR: Steven B. Lionel 


‘ nt 3 HISTORY: 
! 1-001 = Original. SBL 21-August-1980 
! 1-002 - Add NMLSV_ SUBSCRIPT. SBL 15-April-1981 


LITERAL 
NMLS$K_BLKLENGTH = TPASK_LENGTHO + 120; ! TPARSE parameter block Length 


FIELD 
NALSFIELDS = 


The following fields are part of the TPARSE parameter block past that 
4 _used by LIBSTPARSE. 


Set 
NMLSA_LISTBLOCK = CTPASK_LENGTHO + 00, 0, ; is ! NAMELIST descriptor block C 
NMLSA_VARNAME = CTPASK_LENGTHO + Oe 0, 32, 0), ! Variable name C 
NMLSA_VARSTART = CTPASK_LENGTHO + 8. o oe Bye ! Variable start address C 
NML$A_VAREND = CTPASK_LENGTHO + 12, 0, 32, 0], ' Variable end address 
WE -VAGSHie > HAR-UENGIS ¢ 3B: Bo Hes She | Serre ppzzeTe 
= - 9, 16, OJ, : Segmen e 

NMLSW_ STRIDE = CTPASK-LENGTHO + S - 16, OJ, : Stride between elements 
NMLSA_DESCR = [TPASK_LENGTHO + 24, 0, ; . Ol, ! Address of descriptor 

L$A_CCB = CTPASK_-LENGTHO + 28, 0, 32, OJ, ' Address of CC 
NML$B_DTYPE = CTPASK_LENGTHO + 32, 0, 8 . Ol, ' Variable datatype 
NML$V-SUBSTRING = CTPASK_LENGTHO + » @, Oy Gy ! Set if substring 


FORNML .REQ; 1 


NMLS$V_IMAG = 
NMLSV_VALUE_IDENT 


NMLS$V_SUBSCRIPT = 
NMLSB-CONSTYPE = 
NMLSLICURIDX = 
NMLSL-SUBSCR = = 
NMLSLSUBSTRLO = 
NMLSLISUBSTRHI = 
NMLSLCONSBLOCK = 


NMLSL_REPEATCT 
NMLS$T_ TOKEN 


TES; 
! End of FORNML.REQ 


+7777 
sss es es 8s es 
sss sees 
ees ess se eee 


oo OCOOooCOoOUwW,N, —- 
oOo COOOOCOCOOO oO 
Ca | | ee 


Ow 
corn 


>. 
ee 
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Set if imaginary part 


Set if last token was an identifier 
Set of a subscript has been seen 
Constant type 

—— index number 

Subscripts (7 longwords 

Low substring column 

High substring column 

Constant storage block 

4 longwords 


' Repeat count 
' Last token if 


t could be an 
identifier. 
32 bytes long. 


AL EQUIPMENT CORPORATION | 


Q178 8481138 SE D : 
0] c DENTIAL .AND PROPRIETARY 


VAX/VMS V4.0. 


Hi 


